home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 May: Tool Chest / Developer CD Series May 1996 (Tool Chest) (Apple Computer) (1996).iso / Sample Code / Snippets / Hardware / VBLSnippet / VBLSnippet.r < prev    next >
Encoding:
Text File  |  1995-01-27  |  1.1 KB  |  59 lines  |  [TEXT/MPS ]
  1. /*
  2. **    File:        Switch Stack.r
  3. **
  4. **    Contains:    A simple 68K example of a VBL written in C that runs on a
  5. **                private stack.
  6. **
  7. **    Written by:    Jim Luther (Based on the VBL code from the Technical Note
  8. **                "MultiFinder Miscellanea".) 
  9. **
  10. **    Copyright:    © 1993-1995 by Apple Computer, Inc., all rights reserved.
  11. **
  12. **    Change History (most recent first):
  13. **
  14. **         <5>     01/27/95    JML        Added .r file for resources
  15. **         <4>     01/27/95    JML        Got rid of the THINK C-isms. Now builds with THINK C, MPW C, and Metrowerks C
  16. **         <3>     11/02/93    JML        Added reentrancy comment to VBL
  17. **         <2>     10/13/93    JML        Minor cleanup
  18. **         <1>     10/08/93    JML        First pass
  19. **
  20. */
  21.  
  22. #define SystemSevenOrLater 1
  23.  
  24. #include "Types.r"
  25.  
  26. resource 'DLOG' (140) {
  27.     {40, 40, 115, 281},
  28.     dBoxProc,
  29.     visible,
  30.     goAway,
  31.     0x0,
  32.     128,
  33.     "",
  34.     alertPositionMainScreen
  35. };
  36.  
  37. resource 'DITL' (128) {
  38.     {    /* array DITLarray: 3 elements */
  39.         /* [1] */
  40.         {40, 90, 55, 222},
  41.         StaticText {
  42.             disabled,
  43.             "Static Text"
  44.         },
  45.         /* [2] */
  46.         {40, 20, 56, 91},
  47.         StaticText {
  48.             disabled,
  49.             "gCounter:"
  50.         },
  51.         /* [3] */
  52.         {10, 20, 30, 213},
  53.         StaticText {
  54.             disabled,
  55.             "Click mouse button to quit…"
  56.         }
  57.     }
  58. };
  59.